*Table A.14: Meal and Snack treatment effects on dietary intake (24h dietary recall)
cd ""

use "master_data_adults_child_s13456_shared.dta", clear 

drop meal_control snack_control
gen meal_control=1 if treatment==2
replace meal_control=0 if treatment==1

gen snack_control=1 if treatment==3
replace snack_control=0 if treatment==1

drop if type_id=="X" // **Dropping newborns born during the three years of study
drop if id=="3885553B" //**error in the id number and empty data
drop if id=="3885553G" //**error in the id number and empty data
replace treatment=2 if id=="38855553B" //**retrieving the correct treatment for this id
replace treatment=2 if id=="38855553G" //**retrieving the correct treatment for this id
drop if id=="101aa22c" //**this id does not exist

ge food15_other_veg_new=food15_other_veg
replace food15_other_veg_new=0 if food15_other_veg==. & energykcal!=.

ge food16_fruit_new=food16_fruit
replace food16_fruit_new=0 if food16_fruit==. & energykcal!=.

su food15_other_veg 
su food16_fruit 
su food15_other_veg_new 
su food16_fruit_new

drop portion_veg_wisp portion_fruit_wisp
gen portion_veg_wisp=food15_other_veg/80
gen portion_fruit_wisp=food16_fruit/80
gen fuit_and_veg_g=total_veg_fruit_eatwell if session==1
replace fuit_and_veg_g=total_veg_fruit_eatwell if session==3
replace fuit_and_veg_g=food15_other_veg+food16_fruit if session==4

ge FV=food15_other_veg_new+food16_fruit_new


********************************************************************************
ge meal=(treatment==2)
replace meal=. if treatment==.

ge snack=(treatment==3)
replace snack=. if treatment==.

ge session1=(session==1)
replace session1=. if session==.

ge session3=(session==3)
replace session3=. if session==.

ge session4=(session==4)
replace session4=. if session==.

ge session5=(session==5)
replace session5=. if session==.

ge session6=(session==6)
replace session6=. if session==.

ge meal_session1=meal*session1
ge meal_session3=meal*session3
ge meal_session4=meal*session4
ge meal_session5=meal*session5
ge meal_session6=meal*session6

ge snack_session1=snack*session1
ge snack_session3=snack*session3
ge snack_session4=snack*session4
ge snack_session5=snack*session5
ge snack_session6=snack*session6


*PANEL A CHILDREN
xtreg energykcal session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==1, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg FV session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==1, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg saturatesg session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==1, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg nmesg session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==1, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

*PANEL B ADULTS
xtreg energykcal session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==0, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg FV session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==0, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg saturatesg session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==0, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6

xtreg nmesg session3 session4 session5 session6 meal_session3 meal_session4 meal_session5 meal_session6 snack_session3 snack_session4 snack_session5 snack_session6 if child==0, i(id_nb)cluster(hh_id) fe
test meal_session3 meal_session4 meal_session5 meal_session6
test snack_session3 snack_session4 snack_session5 snack_session6
